on mouseDown
  puppetsound 0
 
  openxlib "Foremost.dll"
  set Fm = Foremost(mNew)
  unload
  open the Pathname & "help\sciemain.hlp" with "winhelp"
  cursor -1
  set x = 1
  repeat while x = 1
    set x =   FM(mIsForeMost)
  end repeat
  
  set x = 0
  repeat while x =0
    set x =   FM(mIsForeMost)
  end repeat
  
  updatestage
  Fm(mDispose)
end